<% articleid=request("id") set rs=server.createobject("adodb.recordset") sql="select * from learning where articleid="&articleid rs.open sql,conn,1,1 if rs.eof or rs.bof then response.write "" response.end() end if zhuyan=rs("name") if len(zhuyan)>16 then zhuyan=left(zhuyan,16)&"..." end if title=rs("title") ittype=rs("typeid") where=rs("where") content1=rs("content") hits=rs("hits") sipp=rs("serverip") dateandtime=rs("dateandtime") domurl=rs("domurl") movietype=rs("movietype") if movietype="rm" or movietype="md" then movietype="17BOBO_P2P" elseif movietype="qvod" then movietype="Qvod_player" end if conn.execute("update learning set hits=hits+1 where articleid="&articleid) rs.close set rs=nothing %> <%=sitename%>|<%=sitekey1%>
 您的位置:<%=sitename%> >> <%=ittype%> >> <%=title%>
<%=domurl%><%else%>../<%=domurl%><%end if%>" alt="<%=title%>" width="158" height="228" border="1" align="top" />
<%=title%> 报错
影片类别: <%=ittype%>
主要演员: <%=zhuyan%>
观看次数: 共<%if request("html")="yes" then response.write"" else response.write hits end if%> 次 顶的越多,影片的人气越高!
播放模式: <%=movietype%>
加入时间: <%=dateandtime%>
 <%=movietype%>点播>>>
<%Set rstt=conn.execute("select count(id) from movieurl where nameid='"&articleid&"'") urls=rstt(0) rstt.close if urls>40 then %>
<%else%>
<% end if sql="select * from movieurl where nameid='"&articleid&"' order by id asc" set rsurl=server.createobject("adodb.recordset") rsurl.open sql,conn,1,1 if rsurl.eof then response.write "暂停该影片的在线播放,想看该片的朋友稍后或下载后再观看!" else no=rsurl.recordcount if no=1 then%> <%elseif no=2 then%> <%rsurl.movenext%> <%elseif no=3 then%> <%rsurl.movenext%> <%rsurl.movenext%> <%elseif no>3 then dim c for c=1 to no %> <% rsurl.movenext next end if end if rsurl.close set rsurl=nothing %>
 推荐给朋友:
<% set rs=conn.execute("select * from movieurl1 where nameid='"&articleid&"'") if not(rs.eof or rs.bof) then call webplay() end if call closeconn() %>
 影片介绍>>>
<%=content1%>